Pattern World - Islam, Europe, Modern

home *** CD-ROM | disk | FTP | other *** search
/ Pattern World - Islam, Europe, Modern / Pattern World - Islam, Europe, Modern.iso / MovieFolder / browser / browser.rsrc / VWFI_1024 < prev next >
Unknown | 1993-06-05 | 5.6 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`100%`	file	data	default
`100%`	TrID	Adobe PhotoShop Brush	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 00 30 e6 80 | 00 00 00 0c 00 00 00 00 |.....0..|........|
|00000010| 00 07 00 00 00 00 00 00 | 15 e1 00 00 16 15 00 00 |........|........|
|00000020| 16 25 00 00 16 25 00 00 | 16 27 00 00 16 27 00 00 |.%...%..|.'...'..|
|00000030| 16 27 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.'------|--------|
|00000040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |--------|------..|
|00000070| 6f 6e 20 73 74 61 72 74 | 4d 6f 76 69 65 0d 20 20 |on start|Movie.  |
|00000080| 20 20 0d 20 20 20 20 67 | 6c 6f 62 61 6c 20 6e 6f |  .    g|lobal no|
|00000090| 77 4e 75 6d 20 2c 20 73 | 74 61 72 74 4e 75 6d 20 |wNum , s|tartNum |
|000000a0| 2c 20 65 6e 64 4e 75 6d | 20 2c 20 66 4e 61 6d 65 |, endNum| , fName|
|000000b0| 53 20 2c 20 66 4e 61 6d | 65 4c 0d 20 20 20 20 67 |S , fNam|eL.    g|
|000000c0| 6c 6f 62 61 6c 20 73 61 | 76 65 54 79 70 65 20 2c |lobal sa|veType ,|
|000000d0| 20 73 61 76 65 4e 61 6d | 65 20 2c 20 73 61 76 65 | saveNam|e , save|
|000000e0| 43 6f 6c 6f 72 0d 20 20 | 20 20 67 6c 6f 62 61 6c |Color.  |  global|
|000000f0| 20 72 75 6e 6e 69 6e 67 | 20 2c 20 73 6c 69 64 65 | running| , slide|
|00000100| 63 6f 75 6e 74 20 2c 70 | 61 74 68 4c 0d 20 20 20 |count ,p|athL.   |
|00000110| 20 0d 20 20 20 20 70 75 | 74 20 31 30 31 20 69 6e | .    pu|t 101 in|
|00000120| 74 6f 20 73 74 61 72 74 | 4e 75 6d 0d 20 20 20 20 |to start|Num.    |
|00000130| 70 75 74 20 73 74 61 72 | 74 4e 75 6d 20 69 6e 74 |put star|tNum int|
|00000140| 6f 20 6e 6f 77 4e 75 6d | 0d 20 20 20 20 70 75 74 |o nowNum|.    put|
|00000150| 20 32 30 30 20 69 6e 74 | 6f 20 65 6e 64 4e 75 6d | 200 int|o endNum|
|00000160| 0d 20 20 20 20 70 75 74 | 20 22 2e 51 54 38 22 20 |.    put| ".QT8" |
|00000170| 69 6e 74 6f 20 66 4e 61 | 6d 65 53 0d 20 20 20 20 |into fNa|meS.    |
|00000180| 70 75 74 20 22 22 20 69 | 6e 74 6f 20 72 75 6e 6e |put "" i|nto runn|
|00000190| 69 6e 67 0d 20 20 20 20 | 70 75 74 20 30 20 69 6e |ing.    |put 0 in|
|000001a0| 74 6f 20 73 6c 69 64 65 | 63 6f 75 6e 74 0d 20 20 |to slide|count.  |
|000001b0| 20 20 70 75 74 20 31 20 | 69 6e 74 6f 20 73 61 76 |  put 1 |into sav|
|000001c0| 65 54 79 70 65 0d 20 20 | 20 20 70 75 74 20 22 43 |eType.  |  put "C|
|000001d0| 2e 41 52 54 33 22 20 69 | 6e 74 6f 20 73 61 76 65 |.ART3" i|nto save|
|000001e0| 4e 61 6d 65 0d 20 20 20 | 20 0d 20 20 20 20 69 66 |Name.   | .    if|
|000001f0| 20 74 68 65 20 63 6f 6c | 6f 72 44 65 70 74 68 20 | the col|orDepth |
|00000200| 3e 20 38 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 |> 8 then|.       |
|00000210| 20 70 75 74 20 22 50 61 | 74 74 65 72 6e 57 6f 72 | put "Pa|tternWor|
|00000220| 6c 64 3a 50 69 63 74 46 | 69 6c 65 3a 32 34 62 69 |ld:PictF|ile:24bi|
|00000230| 74 3a 22 20 69 6e 74 6f | 20 70 61 74 68 4c 0d 20 |t:" into| pathL. |
|00000240| 20 20 20 20 20 20 20 70 | 75 74 20 22 2e 32 34 62 |       p|ut ".24b|
|00000250| 69 74 22 20 69 6e 74 6f | 20 66 4e 61 6d 65 4c 0d |it" into| fNameL.|
|00000260| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 20 |    else|.       |
|00000270| 20 70 75 74 20 22 50 61 | 74 74 65 72 6e 57 6f 72 | put "Pa|tternWor|
|00000280| 6c 64 3a 50 69 63 74 46 | 69 6c 65 3a 38 62 69 74 |ld:PictF|ile:8bit|
|00000290| 3a 22 20 69 6e 74 6f 20 | 70 61 74 68 4c 0d 20 20 |:" into |pathL.  |
|000002a0| 20 20 20 20 20 20 70 75 | 74 20 22 2e 38 62 69 74 |      pu|t ".8bit|
|000002b0| 22 20 69 6e 74 6f 20 66 | 4e 61 6d 65 4c 0d 20 20 |" into f|NameL.  |
|000002c0| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 0d 20 20 |  end if|.    .  |
|000002d0| 20 20 70 75 70 70 65 74 | 53 70 72 69 74 65 20 32 |  puppet|Sprite 2|
|000002e0| 2c 20 54 52 55 45 0d 20 | 20 20 20 73 68 6f 77 50 |, TRUE. |   showP|
|000002f0| 69 63 74 0d 20 20 20 20 | 0d 65 6e 64 20 73 74 61 |ict.    |.end sta|
|00000300| 72 74 4d 6f 76 69 65 0d | 0d 2d 2d 2d 2d 2d 2d 2d |rtMovie.|.-------|
|00000310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000340| 2d 2d 2d 2d 2d 0d 0d 6f | 6e 20 73 68 6f 77 50 69 |-----..o|n showPi|
|00000350| 63 74 0d 20 20 20 20 0d | 20 20 20 20 67 6c 6f 62 |ct.    .|    glob|
|00000360| 61 6c 20 6e 6f 77 4e 75 | 6d 20 2c 20 66 4e 61 6d |al nowNu|m , fNam|
|00000370| 65 53 20 2c 20 73 61 76 | 65 4e 61 6d 65 0d 20 20 |eS , sav|eName.  |
|00000380| 20 20 0d 20 20 20 20 70 | 75 74 20 6e 6f 77 4e 75 |  .    p|ut nowNu|
|00000390| 6d 20 26 20 66 4e 61 6d | 65 53 20 69 6e 74 6f 20 |m & fNam|eS into |
|000003a0| 73 68 6f 77 51 54 38 0d | 20 20 20 20 73 65 74 20 |showQT8.|    set |
|000003b0| 74 68 65 20 63 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the cast|Num of s|
|000003c0| 70 72 69 74 65 20 32 20 | 74 6f 20 74 68 65 20 6e |prite 2 |to the n|
|000003d0| 75 6d 62 65 72 20 6f 66 | 20 63 61 73 74 20 73 68 |umber of| cast sh|
|000003e0| 6f 77 51 54 38 0d 20 20 | 20 20 75 70 44 61 74 65 |owQT8.  |  upDate|
|000003f0| 53 74 61 67 65 0d 20 20 | 20 20 70 75 74 20 6e 6f |Stage.  |  put no|
|00000400| 77 4e 75 6d 20 26 20 73 | 61 76 65 4e 61 6d 65 20 |wNum & s|aveName |
|00000410| 69 6e 74 6f 20 66 69 65 | 6c 64 20 41 31 31 0d 20 |into fie|ld A11. |
|00000420| 20 20 20 0d 20 20 20 20 | 75 6e 4c 6f 61 64 43 61 |   .    |unLoadCa|
|00000430| 73 74 0d 20 20 20 20 0d | 65 6e 64 20 53 68 6f 77 |st.    .|end Show|
|00000440| 50 69 63 74 0d 0d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |Pict..--|--------|
|00000450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000480| 2d 2d 0d 0d 6f 6e 20 6e | 65 78 74 0d 20 20 20 20 |--..on n|ext.    |
|00000490| 0d 20 20 20 20 67 6c 6f | 62 61 6c 20 6e 6f 77 4e |.    glo|bal nowN|
|000004a0| 75 6d 20 2c 65 6e 64 4e | 75 6d 20 2c 20 73 74 61 |um ,endN|um , sta|
|000004b0| 72 74 4e 75 6d 0d 20 20 | 20 20 0d 20 20 20 20 69 |rtNum.  |  .    i|
|000004c0| 66 20 6e 6f 77 4e 75 6d | 20 3d 20 65 6e 64 4e 75 |f nowNum| = endNu|
|000004d0| 6d 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 70 |m then. |       p|
|000004e0| 75 74 20 73 74 61 72 74 | 4e 75 6d 20 69 6e 74 6f |ut start|Num into|
|000004f0| 20 6e 6f 77 4e 75 6d 0d | 20 20 20 20 65 6c 73 65 | nowNum.|    else|
|00000500| 0d 20 20 20 20 20 20 20 | 20 70 75 74 20 69 6e 74 |.       | put int|
|00000510| 65 67 65 72 28 6e 6f 77 | 4e 75 6d 20 2b 20 31 29 |eger(now|Num + 1)|
|00000520| 20 69 6e 74 6f 20 6e 6f | 77 4e 75 6d 0d 20 20 20 | into no|wNum.   |
|00000530| 20 65 6e 64 20 69 66 0d | 20 20 20 20 0d 20 20 20 | end if.|    .   |
|00000540| 20 73 68 6f 77 50 69 63 | 74 0d 20 20 20 20 0d 65 | showPic|t.    .e|
|00000550| 6e 64 20 6e 65 78 74 0d | 0d 2d 2d 2d 2d 2d 2d 2d |nd next.|.-------|
|00000560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000590| 2d 2d 2d 2d 0d 0d 6f 6e | 20 70 72 65 76 0d 20 20 |----..on| prev.  |
|000005a0| 20 20 0d 20 20 20 20 67 | 6c 6f 62 61 6c 20 6e 6f |  .    g|lobal no|
|000005b0| 77 4e 75 6d 20 2c 65 6e | 64 4e 75 6d 20 2c 20 73 |wNum ,en|dNum , s|
|000005c0| 74 61 72 74 4e 75 6d 0d | 20 20 20 20 0d 20 20 20 |tartNum.|    .   |
|000005d0| 20 69 66 20 6e 6f 77 4e | 75 6d 20 3d 20 73 74 61 | if nowN|um = sta|
|000005e0| 72 74 4e 75 6d 20 74 68 | 65 6e 0d 20 20 20 20 20 |rtNum th|en.     |
|000005f0| 20 20 20 70 75 74 20 65 | 6e 64 4e 75 6d 20 69 6e |   put e|ndNum in|
|00000600| 74 6f 20 6e 6f 77 4e 75 | 6d 0d 20 20 20 20 65 6c |to nowNu|m.    el|
|00000610| 73 65 0d 20 20 20 20 20 | 20 20 20 70 75 74 20 69 |se.     |   put i|
|00000620| 6e 74 65 67 65 72 28 6e | 6f 77 4e 75 6d 20 2d 20 |nteger(n|owNum - |
|00000630| 31 29 20 69 6e 74 6f 20 | 6e 6f 77 4e 75 6d 0d 20 |1) into |nowNum. |
|00000640| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 0d 20 |   end i|f.    . |
|00000650| 20 20 20 73 68 6f 77 50 | 69 63 74 0d 20 20 20 20 |   showP|ict.    |
|00000660| 0d 65 6e 64 20 70 72 65 | 76 0d 0d 2d 2d 2d 2d 2d |.end pre|v..-----|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 0d 6f 6e 20 69 |--------|--..on i|
|000006b0| 64 6c 65 0d 20 20 20 20 | 0d 20 20 20 20 67 6c 6f |dle.    |.    glo|
|000006c0| 62 61 6c 20 6e 6f 77 4e | 75 6d 20 2c 65 6e 64 4e |bal nowN|um ,endN|
|000006d0| 75 6d 20 2c 20 66 4e 61 | 6d 65 53 20 2c 20 66 4e |um , fNa|meS , fN|
|000006e0| 61 6d 65 4c 20 2c 20 73 | 74 61 72 74 4e 75 6d 20 |ameL , s|tartNum |
|000006f0| 2c 20 72 75 6e 6e 69 6e | 67 20 2c 20 73 6c 69 64 |, runnin|g , slid|
|00000700| 65 63 6f 75 6e 74 0d 20 | 20 20 20 0d 20 20 20 20 |ecount. |   .    |
|00000710| 69 66 20 72 75 6e 6e 69 | 6e 67 20 3c 3e 20 22 22 |if runni|ng <> ""|
|00000720| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 0d 20 | then.  |      . |
|00000730| 20 20 20 20 20 20 20 69 | 66 20 73 6c 69 64 65 63 |       i|f slidec|
|00000740| 6f 75 6e 74 20 3c 3e 20 | 30 20 74 68 65 6e 0d 20 |ount <> |0 then. |
|00000750| 20 20 20 20 20 20 20 20 | 20 20 20 0d 20 20 20 20 |        |   .    |
|00000760| 20 20 20 20 20 20 20 20 | 69 66 20 73 6c 69 64 65 |        |if slide|
|00000770| 63 6f 75 6e 74 20 3e 20 | 34 20 74 68 65 6e 0d 20 |count > |4 then. |
|00000780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 0d |        |       .|
|00000790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000007a0| 69 66 20 6e 6f 77 4e 75 | 6d 20 3e 3d 20 65 6e 64 |if nowNu|m >= end|
|000007b0| 4e 75 6d 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 |Num then|.       |
|000007c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 70 75 74 |        |     put|
|000007d0| 20 73 74 61 72 74 4e 75 | 6d 20 69 6e 74 6f 20 6e | startNu|m into n|
|000007e0| 6f 77 4e 75 6d 0d 20 20 | 20 20 20 20 20 20 20 20 |owNum.  |        |
|000007f0| 20 20 20 20 20 20 65 6c | 73 65 0d 20 20 20 20 20 |      el|se.     |
|00000800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 70 |        |       p|
|00000810| 75 74 20 69 6e 74 65 67 | 65 72 28 6e 6f 77 4e 75 |ut integ|er(nowNu|
|00000820| 6d 20 2b 20 31 29 20 69 | 6e 74 6f 20 6e 6f 77 4e |m + 1) i|nto nowN|
|00000830| 75 6d 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |um.     |        |
|00000840| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 20 20 |   end i|f.      |
|00000850| 20 20 20 20 20 20 20 20 | 20 20 0d 20 20 20 20 20 |        |  .     |
|00000860| 20 20 20 20 20 20 20 20 | 20 20 20 73 68 6f 77 50 |        |   showP|
|00000870| 69 63 74 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |ict.    |        |
|00000880| 20 20 20 20 75 70 44 61 | 74 65 53 74 61 67 65 0d |    upDa|teStage.|
|00000890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008a0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|000008b0| 20 70 75 74 20 30 20 69 | 6e 74 6f 20 73 6c 69 64 | put 0 i|nto slid|
|000008c0| 65 63 6f 75 6e 74 0d 20 | 20 20 20 20 20 20 20 20 |ecount. |        |
|000008d0| 20 20 20 20 20 20 20 0d | 20 20 20 20 20 20 20 20 |       .|        |
|000008e0| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 20 |    else|.       |
|000008f0| 20 20 20 20 20 20 20 20 | 20 70 75 74 20 73 6c 69 |        | put sli|
|00000900| 64 65 63 6f 75 6e 74 20 | 2b 20 31 20 69 6e 74 6f |decount |+ 1 into|
|00000910| 20 73 6c 69 64 65 63 6f | 75 6e 74 0d 20 20 20 20 | slideco|unt.    |
|00000920| 20 20 20 20 20 20 20 20 | 65 6e 64 20 69 66 0d 20 |        |end if. |
|00000930| 20 20 20 20 20 20 20 20 | 20 20 20 0d 20 20 20 20 |        |   .    |
|00000940| 20 20 20 20 65 6c 73 65 | 0d 20 20 20 20 20 20 20 |    else|.       |
|00000950| 20 20 20 20 20 69 66 20 | 6e 6f 77 4e 75 6d 20 3e |     if |nowNum >|
|00000960| 3d 20 65 6e 64 4e 75 6d | 20 74 68 65 6e 0d 20 20 |= endNum| then.  |
|00000970| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 70 75 |        |      pu|
|00000980| 74 20 73 74 61 72 74 4e | 75 6d 20 69 6e 74 6f 20 |t startN|um into |
|00000990| 70 72 65 4e 6f 77 4e 75 | 6d 0d 20 20 20 20 20 20 |preNowNu|m.      |
|000009a0| 20 20 20 20 20 20 65 6c | 73 65 0d 20 20 20 20 20 |      el|se.     |
|000009b0| 20 20 20 20 20 20 20 20 | 20 20 20 70 75 74 20 6e |        |   put n|
|000009c0| 6f 77 4e 75 6d 2b 31 20 | 69 6e 74 6f 20 70 72 65 |owNum+1 |into pre|
|000009d0| 4e 6f 77 4e 75 6d 0d 20 | 20 20 20 20 20 20 20 20 |NowNum. |        |
|000009e0| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 20 20 |   end i|f.      |
|000009f0| 20 20 20 20 20 20 70 75 | 74 20 70 72 65 4e 6f 77 |      pu|t preNow|
|00000a00| 4e 75 6d 20 26 20 66 4e | 61 6d 65 53 20 69 6e 74 |Num & fN|ameS int|
|00000a10| 6f 20 50 4c 43 0d 20 20 | 20 20 20 20 20 20 20 20 |o PLC.  |        |
|00000a20| 20 20 70 72 65 4c 6f 61 | 64 43 61 73 74 20 50 4c |  preLoa|dCast PL|
|00000a30| 43 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 70 75 |C.      |      pu|
|00000a40| 74 20 73 6c 69 64 65 63 | 6f 75 6e 74 20 2b 20 31 |t slidec|ount + 1|
|00000a50| 20 69 6e 74 6f 20 73 6c | 69 64 65 63 6f 75 6e 74 | into sl|idecount|
|00000a60| 0d 20 20 20 20 20 20 20 | 20 65 6e 64 20 69 66 0d |.       | end if.|
|00000a70| 20 20 20 20 20 20 20 20 | 0d 20 20 20 20 65 6e 64 |        |.    end|
|00000a80| 20 69 66 0d 20 20 20 20 | 0d 65 6e 64 20 69 64 6c | if.    |.end idl|
|00000a90| 65 0d 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |e..-----|--------|
|00000aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |--------|------..|
|00000ad0| 6f 6e 20 73 65 74 53 61 | 76 65 54 79 70 65 0d 20 |on setSa|veType. |
|00000ae0| 20 20 20 0d 20 20 20 20 | 67 6c 6f 62 61 6c 20 73 |   .    |global s|
|00000af0| 61 76 65 54 79 70 65 20 | 2c 20 73 61 76 65 4e 61 |aveType |, saveNa|
|00000b00| 6d 65 20 2c 20 6e 6f 77 | 4e 75 6d 20 2c 20 73 61 |me , now|Num , sa|
|00000b10| 76 65 43 6f 6c 6f 72 0d | 20 20 20 20 0d 20 20 20 |veColor.|    .   |
|00000b20| 20 69 66 20 73 61 76 65 | 54 79 70 65 20 3e 3d 20 | if save|Type >= |
|00000b30| 35 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 70 |5 then. |       p|
|00000b40| 75 74 20 31 20 69 6e 74 | 6f 20 73 61 76 65 54 79 |ut 1 int|o saveTy|
|00000b50| 70 65 0d 20 20 20 20 65 | 6c 73 65 0d 20 20 20 20 |pe.    e|lse.    |
|00000b60| 20 20 20 20 70 75 74 20 | 73 61 76 65 54 79 70 65 |    put |saveType|
|00000b70| 20 2b 20 31 20 69 6e 74 | 6f 20 73 61 76 65 54 79 | + 1 int|o saveTy|
|00000b80| 70 65 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |pe.    e|nd if.  |
|00000b90| 20 20 0d 20 20 20 20 69 | 66 20 73 61 76 65 43 6f |  .    i|f saveCo|
|00000ba0| 6c 6f 72 20 3c 3e 20 30 | 20 74 68 65 6e 0d 20 20 |lor <> 0| then.  |
|00000bb0| 20 20 20 20 20 20 69 66 | 20 73 61 76 65 54 79 70 |      if| saveTyp|
|00000bc0| 65 20 3e 20 33 20 74 68 | 65 6e 0d 20 20 20 20 20 |e > 3 th|en.     |
|00000bd0| 20 20 20 20 20 20 20 70 | 75 74 20 30 20 69 6e 74 |       p|ut 0 int|
|00000be0| 6f 20 73 61 76 65 43 6f | 6c 6f 72 0d 20 20 20 20 |o saveCo|lor.    |
|00000bf0| 20 20 20 20 20 20 20 20 | 70 75 74 20 22 43 6f 6c |        |put "Col|
|00000c00| 6f 72 22 20 69 6e 74 6f | 20 66 69 65 6c 64 20 41 |or" into| field A|
|00000c10| 31 33 0d 20 20 20 20 20 | 20 20 20 65 6e 64 20 69 |13.     |   end i|
|00000c20| 66 0d 20 20 20 20 65 6e | 64 20 69 66 0d 20 20 20 |f.    en|d if.   |
|00000c30| 20 0d 20 20 20 20 70 75 | 74 20 6c 69 6e 65 20 73 | .    pu|t line s|
|00000c40| 61 76 65 54 79 70 65 20 | 2b 20 73 61 76 65 43 6f |aveType |+ saveCo|
|00000c50| 6c 6f 72 20 6f 66 20 66 | 69 65 6c 64 20 41 31 36 |lor of f|ield A16|
|00000c60| 20 69 6e 74 6f 20 73 61 | 76 65 4e 61 6d 65 0d 20 | into sa|veName. |
|00000c70| 20 20 20 70 75 74 20 6e | 6f 77 4e 75 6d 20 26 20 |   put n|owNum & |
|00000c80| 73 61 76 65 4e 61 6d 65 | 20 69 6e 74 6f 20 66 69 |saveName| into fi|
|00000c90| 65 6c 64 20 41 31 31 0d | 20 20 20 20 0d 20 20 20 |eld A11.|    .   |
|00000ca0| 20 70 75 74 20 6c 69 6e | 65 20 73 61 76 65 54 79 | put lin|e saveTy|
|00000cb0| 70 65 20 6f 66 20 66 69 | 65 6c 64 20 41 31 37 20 |pe of fi|eld A17 |
|00000cc0| 69 6e 74 6f 20 66 69 65 | 6c 64 20 41 31 32 0d 20 |into fie|ld A12. |
|00000cd0| 20 20 20 0d 65 6e 64 20 | 73 65 74 53 61 76 65 54 |   .end |setSaveT|
|00000ce0| 79 70 65 0d 0d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ype..---|--------|
|00000cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d20| 0d 0d 6f 6e 20 73 65 74 | 53 61 76 65 43 6f 6c 6f |..on set|SaveColo|
|00000d30| 72 0d 20 20 20 20 0d 20 | 20 20 20 67 6c 6f 62 61 |r.    . |   globa|
|00000d40| 6c 20 73 61 76 65 43 6f | 6c 6f 72 20 2c 20 73 61 |l saveCo|lor , sa|
|00000d50| 76 65 54 79 70 65 20 2c | 20 73 61 76 65 4e 61 6d |veType ,| saveNam|
|00000d60| 65 20 2c 20 6e 6f 77 4e | 75 6d 0d 20 20 20 20 0d |e , nowN|um.    .|
|00000d70| 20 20 20 20 69 66 20 73 | 61 76 65 54 79 70 65 20 |    if s|aveType |
|00000d80| 3c 20 34 20 6f 72 20 73 | 61 76 65 54 79 70 65 20 |< 4 or s|aveType |
|00000d90| 3e 20 35 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 |> 5 then|.       |
|00000da0| 20 0d 20 20 20 20 20 20 | 20 20 69 66 20 73 61 76 | .      |  if sav|
|00000db0| 65 43 6f 6c 6f 72 20 3d | 20 30 20 74 68 65 6e 0d |eColor =| 0 then.|
|00000dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 70 75 74 20 |        |    put |
|00000dd0| 35 20 69 6e 74 6f 20 73 | 61 76 65 43 6f 6c 6f 72 |5 into s|aveColor|
|00000de0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 70 75 74 |.       |     put|
|00000df0| 20 22 42 6c 61 63 6b 20 | 26 20 57 68 69 74 65 22 | "Black |& White"|
|00000e00| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 41 31 33 0d | into fi|eld A13.|
|00000e10| 20 20 20 20 20 20 20 20 | 65 6c 73 65 0d 20 20 20 |        |else.   |
|00000e20| 20 20 20 20 20 20 20 20 | 20 70 75 74 20 30 20 69 |        | put 0 i|
|00000e30| 6e 74 6f 20 73 61 76 65 | 43 6f 6c 6f 72 0d 20 20 |nto save|Color.  |
|00000e40| 20 20 20 20 20 20 20 20 | 20 20 70 75 74 20 22 43 |        |  put "C|
|00000e50| 6f 6c 6f 72 22 20 69 6e | 74 6f 20 66 69 65 6c 64 |olor" in|to field|
|00000e60| 20 41 31 33 0d 20 20 20 | 20 20 20 20 20 65 6e 64 | A13.   |     end|
|00000e70| 20 69 66 0d 20 20 20 20 | 20 20 20 20 0d 20 20 20 | if.    |    .   |
|00000e80| 20 65 6e 64 20 69 66 0d | 20 20 20 20 0d 20 20 20 | end if.|    .   |
|00000e90| 20 70 75 74 20 6c 69 6e | 65 20 73 61 76 65 54 79 | put lin|e saveTy|
|00000ea0| 70 65 20 2b 20 73 61 76 | 65 43 6f 6c 6f 72 20 6f |pe + sav|eColor o|
|00000eb0| 66 20 66 69 65 6c 64 20 | 41 31 36 20 69 6e 74 6f |f field |A16 into|
|00000ec0| 20 73 61 76 65 4e 61 6d | 65 0d 20 20 20 20 70 75 | saveNam|e.    pu|
|00000ed0| 74 20 6e 6f 77 4e 75 6d | 20 26 20 73 61 76 65 4e |t nowNum| & saveN|
|00000ee0| 61 6d 65 20 69 6e 74 6f | 20 66 69 65 6c 64 20 41 |ame into| field A|
|00000ef0| 31 31 0d 20 20 20 20 0d | 65 6e 64 20 73 65 74 53 |11.    .|end setS|
|00000f00| 61 76 65 43 6f 6c 6f 72 | 0d 0d 2d 2d 2d 2d 2d 2d |aveColor|..------|
|00000f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000f40| 2d 2d 2d 2d 2d 0d 0d 6f | 6e 20 73 61 76 65 46 69 |-----..o|n saveFi|
|00000f50| 6c 65 0d 20 20 20 20 0d | 20 20 20 20 67 6c 6f 62 |le.    .|    glob|
|00000f60| 61 6c 20 73 61 76 65 54 | 79 70 65 20 2c 20 73 61 |al saveT|ype , sa|
|00000f70| 76 65 43 6f 6c 6f 72 0d | 20 20 20 20 0d 20 20 20 |veColor.|    .   |
|00000f80| 20 70 75 74 20 6c 69 6e | 65 20 73 61 76 65 54 79 | put lin|e saveTy|
|00000f90| 70 65 20 2b 20 73 61 76 | 65 43 6f 6c 6f 72 20 6f |pe + sav|eColor o|
|00000fa0| 66 20 66 69 65 6c 64 20 | 41 31 38 20 69 6e 74 6f |f field |A18 into|
|00000fb0| 20 70 61 74 68 0d 20 20 | 20 20 70 75 74 20 70 61 | path.  |  put pa|
|00000fc0| 74 68 20 26 20 66 69 65 | 6c 64 20 41 31 31 20 0d |th & fie|ld A11 .|
|00000fd0| 20 20 20 20 70 75 74 20 | 63 6f 70 79 46 69 6c 65 |    put |copyFile|
|00000fe0| 28 70 61 74 68 20 26 20 | 66 69 65 6c 64 20 41 31 |(path & |field A1|
|00000ff0| 31 20 2c 20 22 53 61 76 | 65 20 74 6f 20 3a 22 20 |1 , "Sav|e to :" |
|00001000| 2c 66 69 65 6c 64 20 41 | 31 31 29 0d 20 20 20 20 |,field A|11).    |
|00001010| 0d 65 6e 64 20 73 61 76 | 65 46 69 6c 65 0d 0d 2d |.end sav|eFile..-|
|00001020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001050| 2d 2d 2d 2d 0d 0d 6f 6e | 20 73 65 61 72 63 68 61 |----..on| searcha|
|00001060| 6c 6c 0d 20 20 20 20 70 | 75 74 20 66 69 65 6c 64 |ll.    p|ut field|
|00001070| 20 22 73 65 61 72 63 68 | 6b 65 79 31 22 20 69 6e | "search|key1" in|
|00001080| 74 6f 20 73 6b 65 79 31 | 0d 20 20 20 20 70 75 74 |to skey1|.    put|
|00001090| 20 66 69 65 6c 64 20 22 | 73 65 61 72 63 68 6b 65 | field "|searchke|
|000010a0| 79 32 22 20 69 6e 74 6f | 20 73 6b 65 79 32 0d 20 |y2" into| skey2. |
|000010b0| 20 20 20 70 75 74 20 66 | 69 65 6c 64 20 22 66 69 |   put f|ield "fi|
|000010c0| 6c 65 69 6e 66 6f 22 20 | 69 6e 74 6f 20 73 69 6d |leinfo" |into sim|
|000010d0| 61 67 65 0d 20 20 20 20 | 70 75 74 20 22 22 20 69 |age.    |put "" i|
|000010e0| 6e 74 6f 20 73 65 6c 62 | 75 66 0d 20 20 20 20 63 |nto selb|uf.    c|
|000010f0| 75 72 73 6f 72 20 34 0d | 20 20 20 20 72 65 70 65 |ursor 4.|    repe|
|00001100| 61 74 20 77 69 74 68 20 | 69 3d 31 20 74 6f 20 31 |at with |i=1 to 1|
|00001110| 30 30 20 0d 20 20 20 20 | 20 20 20 20 69 66 20 28 |00 .    |    if (|
|00001120| 53 74 72 53 72 63 68 28 | 73 6b 65 79 31 2c 6c 69 |StrSrch(|skey1,li|
|00001130| 6e 65 20 69 20 6f 66 20 | 73 69 6d 61 67 65 29 20 |ne i of |simage) |
|00001140| 3d 20 31 29 20 61 6e 64 | 20 28 53 74 72 53 72 63 |= 1) and| (StrSrc|
|00001150| 68 28 73 6b 65 79 32 2c | 6c 69 6e 65 20 69 20 6f |h(skey2,|line i o|
|00001160| 66 20 73 69 6d 61 67 65 | 29 20 3d 20 31 29 20 74 |f simage|) = 1) t|
|00001170| 68 65 6e 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |hen.    |        |
|00001180| 70 75 74 20 69 2b 31 30 | 30 20 26 20 72 65 74 75 |put i+10|0 & retu|
|00001190| 72 6e 20 61 66 74 65 72 | 20 73 65 6c 62 75 66 0d |rn after| selbuf.|
|000011a0| 20 20 20 20 20 20 20 20 | 65 6e 64 20 69 66 0d 20 |        |end if. |
|000011b0| 20 20 20 65 6e 64 20 72 | 65 70 65 61 74 0d 20 20 |   end r|epeat.  |
|000011c0| 20 20 70 75 74 20 73 65 | 6c 62 75 66 20 69 6e 74 |  put se|lbuf int|
|000011d0| 6f 20 66 69 65 6c 64 20 | 22 73 65 6c 65 63 74 65 |o field |"selecte|
|000011e0| 64 22 0d 20 20 20 20 63 | 75 72 73 6f 72 20 30 0d |d".    c|ursor 0.|
|000011f0| 65 6e 64 20 73 65 61 72 | 63 68 61 6c 6c 0d 0d 2d |end sear|chall..-|
|00001200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001230| 2d 2d 2d 2d 0d 0d 6f 6e | 20 65 64 69 74 6b 65 79 |----..on| editkey|
|00001240| 31 0d 20 20 20 20 70 75 | 74 20 22 22 20 69 6e 74 |1.    pu|t "" int|
|00001250| 6f 20 73 6b 65 79 0d 20 | 20 20 20 69 66 20 74 68 |o skey. |   if th|
|00001260| 65 20 63 61 73 74 4e 75 | 6d 20 6f 66 20 73 70 72 |e castNu|m of spr|
|00001270| 69 74 65 20 31 31 20 3d | 20 41 35 31 20 74 68 65 |ite 11 =| A51 the|
|00001280| 6e 0d 20 20 20 20 20 20 | 20 20 70 75 74 20 22 4e |n.      |  put "N|
|00001290| 2c 22 20 61 66 74 65 72 | 20 73 6b 65 79 0d 20 20 |," after| skey.  |
|000012a0| 20 20 65 6e 64 20 69 66 | 0d 20 20 20 20 69 66 20 |  end if|.    if |
|000012b0| 74 68 65 20 63 61 73 74 | 4e 75 6d 20 6f 66 20 73 |the cast|Num of s|
|000012c0| 70 72 69 74 65 20 31 32 | 20 3d 20 41 35 33 20 74 |prite 12| = A53 t|
|000012d0| 68 65 6e 0d 20 20 20 20 | 20 20 20 20 70 75 74 20 |hen.    |    put |
|000012e0| 22 50 2c 22 20 61 66 74 | 65 72 20 73 6b 65 79 0d |"P," aft|er skey.|
|000012f0| 20 20 20 20 65 6e 64 20 | 69 66 0d 20 20 20 20 69 |    end |if.    i|
|00001300| 66 20 74 68 65 20 63 61 | 73 74 4e 75 6d 20 6f 66 |f the ca|stNum of|
|00001310| 20 73 70 72 69 74 65 20 | 31 33 20 3d 20 41 35 35 | sprite |13 = A55|
|00001320| 20 74 68 65 6e 0d 20 20 | 20 20 20 20 20 20 70 75 | then.  |      pu|
|00001330| 74 20 22 41 2c 22 20 61 | 66 74 65 72 20 73 6b 65 |t "A," a|fter ske|
|00001340| 79 0d 20 20 20 20 65 6e | 64 20 69 66 0d 20 20 20 |y.    en|d if.   |
|00001350| 20 69 66 20 74 68 65 20 | 63 61 73 74 4e 75 6d 20 | if the |castNum |
|00001360| 6f 66 20 73 70 72 69 74 | 65 20 31 34 20 3d 20 41 |of sprit|e 14 = A|
|00001370| 35 37 20 74 68 65 6e 0d | 20 20 20 20 20 20 20 20 |57 then.|        |
|00001380| 70 75 74 20 22 47 2c 22 | 20 61 66 74 65 72 20 73 |put "G,"| after s|
|00001390| 6b 65 79 0d 20 20 20 20 | 65 6e 64 20 69 66 0d 20 |key.    |end if. |
|000013a0| 20 20 20 69 66 20 74 68 | 65 20 63 61 73 74 4e 75 |   if th|e castNu|
|000013b0| 6d 20 6f 66 20 73 70 72 | 69 74 65 20 31 35 20 3d |m of spr|ite 15 =|
|000013c0| 20 41 36 31 20 74 68 65 | 6e 0d 20 20 20 20 20 20 | A61 the|n.      |
|000013d0| 20 20 70 75 74 20 22 4f | 2c 22 20 61 66 74 65 72 |  put "O|," after|
|000013e0| 20 73 6b 65 79 0d 20 20 | 20 20 65 6e 64 20 69 66 | skey.  |  end if|
|000013f0| 0d 20 20 20 20 70 75 74 | 20 74 68 65 20 6e 75 6d |.    put| the num|
|00001400| 62 65 72 20 6f 66 20 63 | 68 61 72 73 20 69 6e 20 |ber of c|hars in |
|00001410| 73 6b 65 79 20 69 6e 74 | 6f 20 6c 0d 20 20 20 20 |skey int|o l.    |
|00001420| 69 66 20 6c 20 3e 20 30 | 20 74 68 65 6e 20 64 65 |if l > 0| then de|
|00001430| 6c 65 74 65 20 63 68 61 | 72 20 6c 20 6f 66 20 73 |lete cha|r l of s|
|00001440| 6b 65 79 0d 20 20 20 20 | 70 75 74 20 73 6b 65 79 |key.    |put skey|
|00001450| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 22 73 65 61 | into fi|eld "sea|
|00001460| 72 63 68 6b 65 79 31 22 | 0d 65 6e 64 20 65 64 69 |rchkey1"|.end edi|
|00001470| 74 6b 65 79 31 0d 0d 6f | 6e 20 65 64 69 74 6b 65 |tkey1..o|n editke|
|00001480| 79 32 0d 20 20 20 20 70 | 75 74 20 22 22 20 69 6e |y2.    p|ut "" in|
|00001490| 74 6f 20 73 6b 65 79 0d | 20 20 20 20 69 66 20 74 |to skey.|    if t|
|000014a0| 68 65 20 63 61 73 74 4e | 75 6d 20 6f 66 20 73 70 |he castN|um of sp|
|000014b0| 72 69 74 65 20 31 36 20 | 3d 20 41 36 33 20 74 68 |rite 16 |= A63 th|
|000014c0| 65 6e 0d 20 20 20 20 20 | 20 20 20 70 75 74 20 22 |en.     |   put "|
|000014d0| 49 2c 22 20 61 66 74 65 | 72 20 73 6b 65 79 0d 20 |I," afte|r skey. |
|000014e0| 20 20 20 65 6e 64 20 69 | 66 0d 20 20 20 20 69 66 |   end i|f.    if|
|000014f0| 20 74 68 65 20 63 61 73 | 74 4e 75 6d 20 6f 66 20 | the cas|tNum of |
|00001500| 73 70 72 69 74 65 20 31 | 37 20 3d 20 41 36 35 20 |sprite 1|7 = A65 |
|00001510| 74 68 65 6e 0d 20 20 20 | 20 20 20 20 20 70 75 74 |then.   |     put|
|00001520| 20 22 45 2c 22 20 61 66 | 74 65 72 20 73 6b 65 79 | "E," af|ter skey|
|00001530| 0d 20 20 20 20 65 6e 64 | 20 69 66 0d 20 20 20 20 |.    end| if.    |
|00001540| 69 66 20 74 68 65 20 63 | 61 73 74 4e 75 6d 20 6f |if the c|astNum o|
|00001550| 66 20 73 70 72 69 74 65 | 20 31 38 20 3d 20 41 36 |f sprite| 18 = A6|
|00001560| 37 20 74 68 65 6e 0d 20 | 20 20 20 20 20 20 20 70 |7 then. |       p|
|00001570| 75 74 20 22 4d 2c 22 20 | 61 66 74 65 72 20 73 6b |ut "M," |after sk|
|00001580| 65 79 0d 20 20 20 20 65 | 6e 64 20 69 66 0d 20 20 |ey.    e|nd if.  |
|00001590| 20 20 70 75 74 20 74 68 | 65 20 6e 75 6d 62 65 72 |  put th|e number|
|000015a0| 20 6f 66 20 63 68 61 72 | 73 20 69 6e 20 73 6b 65 | of char|s in ske|
|000015b0| 79 20 69 6e 74 6f 20 6c | 0d 20 20 20 20 69 66 20 |y into l|.    if |
|000015c0| 6c 20 3e 20 30 20 74 68 | 65 6e 20 64 65 6c 65 74 |l > 0 th|en delet|
|000015d0| 65 20 63 68 61 72 20 6c | 20 6f 66 20 73 6b 65 79 |e char l| of skey|
|000015e0| 0d 20 20 20 20 70 75 74 | 20 73 6b 65 79 20 69 6e |.    put| skey in|
|000015f0| 74 6f 20 66 69 65 6c 64 | 20 22 73 65 61 72 63 68 |to field| "search|
|00001600| 6b 65 79 32 22 0d 65 6e | 64 20 65 64 69 74 6b 65 |key2".en|d editke|
|00001610| 79 32 0d 33 83 69 83 63 | 83 81 8a 94 8e ae 89 ef |y2.3.i.c|........|
|00001620| 8e d0 93 64 8e 71 95 d2 | 8f 57 95 94 20 2d 20 83 |...d.q..|.W.. - .|
|00001630| 69 83 63 83 81 8a 94 8e | ae 89 ef 8e d0 93 64 8e |i.c.....|......d.|
|00001640| 71 95 d2 8f 57 95 94 0f | 6b 61 77 61 69 20 2d 20 |q...W...|kawai - |
|00001650| 4e 41 54 53 55 4d 45 00 | 01                      |NATSUME.|.       |
+--------+-------------------------+-------------------------+--------+--------+